home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1995 April / Internet Tools.iso / applic / ntp / depredated / ntp.3.4 / patches / patch6.Z / patch6
Encoding:
Text File  |  1991-09-29  |  15.1 KB  |  569 lines
  1. System: ntp version 3.4
  2. Patch #: 6
  3. Priority: 
  4.  
  5. Add bit in flags which allow a peer to be synced to.  Changed a char to a bit
  6. field so that it is always signed.
  7. There is now a run-time option that can be specified in the configuration 
  8. which specifies if we will synchronize to unconfigured hosts.  Fixes to
  9. receive() logic state machine.
  10. Add support for "trusting" directive in NTP configuration file.  It allows 
  11. you to specify at run time if non-configured peers will be synced to.
  12. More fixes.  Make sure that compliance is not negative.
  13. Bug fix for VAX_COMPILER_FLT_BUG test, start of test for Sun problem.
  14.  
  15. From:
  16.  
  17. Description:
  18.  
  19. Repeat-By:
  20.  
  21. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your ntp source
  22.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  23.     If you don't have the patch program, apply the following by hand,
  24.     or get patch (version 2.0, latest patchlevel).
  25.  
  26.     After patching:
  27.         make depend
  28.         make
  29.         make install
  30.  
  31.     If patch indicates that patchlevel is the wrong version, you may need
  32.     to apply one or more previous patches, or the patch may already
  33.     have been applied.  See the patchlevel.h file to find out what has or
  34.     has not been applied.  In any event, don't continue with the patch.
  35.  
  36.     If you are missing previous patches they can be obtained from me:
  37.  
  38.     Louis A. Mamakos
  39.     louie@trantor.umd.edu
  40.  
  41.     You can also get the patches via anonymous FTP from
  42.     trantor.umd.edu.
  43.  
  44. Index: patchlevel.h
  45. Prereq: 5
  46. 1c1
  47. < #define PATCHLEVEL 5
  48. ---
  49. > #define PATCHLEVEL 6
  50.  
  51. Index: ntp.h
  52. *** ntp.h.old    Fri Mar 31 16:39:24 1989
  53. --- ntp.h    Fri Mar 31 16:39:25 1989
  54. ***************
  55. *** 1,7 ****
  56. ! /* $Source: /usr/users/louie/ntp/RCS/ntp.h,v $ $Revision: 3.4.1.3 $ $Date: 89/03/29 12:26:18 $ */
  57.   
  58.   /*
  59.    *  $Log:    ntp.h,v $
  60.    * Revision 3.4.1.3  89/03/29  12:26:18  louie
  61.    * Removed some unused #defines.  Replaced MAXSTRATUM with NTP_INFIN per new
  62.    * spec.  The variable 'mode' in the peer structure has been renamed 'hmode'
  63. --- 1,11 ----
  64. ! /* $Source: /usr/users/louie/ntp/RCS/ntp.h,v $ $Revision: 3.4.1.4 $ $Date: 89/03/31 16:34:50 $ */
  65.   
  66.   /*
  67.    *  $Log:    ntp.h,v $
  68. +  * Revision 3.4.1.4  89/03/31  16:34:50  louie
  69. +  * Add bit in flags which allow a peer to be synced to.  Changed a char to a bit
  70. +  * field so that it is always signed.
  71. +  * 
  72.    * Revision 3.4.1.3  89/03/29  12:26:18  louie
  73.    * Removed some unused #defines.  Replaced MAXSTRATUM with NTP_INFIN per new
  74.    * spec.  The variable 'mode' in the peer structure has been renamed 'hmode'
  75. ***************
  76. *** 264,273 ****
  77.   #define    INFO_QUERY    62    /* **** THIS implementation dependent **** */
  78.   #define    INFO_REPLY    63    /* **** THIS implementation dependent **** */
  79.   
  80. - #define    ACTIVE        0x01    /* opposite of PASIVE */
  81. - #define MEDIAN        0x02
  82.   
  83. - 
  84.   /* =================  table 3.2 Peer Variables    ================= */
  85.   struct ntp_peer {
  86.       struct ntp_peer *next, *prev;
  87. --- 268,274 ----
  88. ***************
  89. *** 276,281 ****
  90. --- 277,283 ----
  91.       int    flags;            /* local flags */
  92.   #define    PEER_FL_CONFIG        1
  93.   #define    PEER_FL_AUTHENABLE    2
  94. + #define    PEER_FL_SYNC        0x1000    /* peer can bet sync'd to */
  95.   #define    PEER_FL_BCAST        0x2000    /* broadcast peer */
  96.   #define    PEER_FL_SELECTED    0x8000    /* actually used by query routine */
  97.   
  98. ***************
  99. *** 351,357 ****
  100.       u_char leap;
  101.       u_char stratum;
  102.       u_char ppoll;
  103. !     char precision;
  104.   
  105.       u_char hpoll;
  106.       u_char filler1;
  107. --- 353,359 ----
  108.       u_char leap;
  109.       u_char stratum;
  110.       u_char ppoll;
  111. !     int precision:8;
  112.   
  113.       u_char hpoll;
  114.       u_char filler1;
  115.  
  116. Index: ntp_proto.c
  117. *** ntp_proto.c.old    Fri Mar 31 16:39:33 1989
  118. --- ntp_proto.c    Fri Mar 31 16:39:35 1989
  119. ***************
  120. *** 1,5 ****
  121.   #ifndef    lint
  122. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp_proto.c,v $ $Revision: 3.4.1.4 $ $Date: 89/03/29 12:29:10 $";
  123.   #endif
  124.   
  125.   /*
  126. --- 1,5 ----
  127.   #ifndef    lint
  128. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntp_proto.c,v $ $Revision: 3.4.1.5 $ $Date: 89/03/31 16:36:38 $";
  129.   #endif
  130.   
  131.   /*
  132. ***************
  133. *** 10,15 ****
  134. --- 10,20 ----
  135.    *
  136.    *
  137.    * $Log:    ntp_proto.c,v $
  138. +  * Revision 3.4.1.5  89/03/31  16:36:38  louie
  139. +  * There is now a run-time option that can be specified in the configuration 
  140. +  * which specifies if we will synchronize to unconfigured hosts.  Fixes to
  141. +  * receive() logic state machine.
  142. +  * 
  143.    * Revision 3.4.1.4  89/03/29  12:29:10  louie
  144.    * The variable 'mode' in the peer structure was renamed 'hmode'.  Add 
  145.    * poll_update() calls in a few places per Mills.  The receive() procedure is
  146. ***************
  147. *** 105,110 ****
  148. --- 110,116 ----
  149.   extern int debug;
  150.   extern void dump_pkt();
  151.   #endif
  152. + extern int trusting;
  153.   extern struct sysdata sys;
  154.   extern struct list peer_list;
  155.   extern struct ntp_peer *check_peer();
  156. ***************
  157. *** 316,321 ****
  158. --- 322,340 ----
  159.                          this from */
  160.           peer->hmode = MODE_SYM_PAS;
  161.           clear(peer);
  162. + #if    1
  163. +         /*
  164. +          *  If we decide to consider any random NTP peer that might
  165. +          *  come as a peer we might sync to, then set the PEER_FL_SYNC
  166. +          *  flag in the peer structure.
  167. +          *
  168. +          *  Alternatively, we could change the hmode to MODE_SERVER, 
  169. +          *  but then the peer state wouldn't be persistant.
  170. +          */
  171. +         if (trusting)
  172. +             peer->flags |= PEER_FL_SYNC;
  173. + #endif
  174. + 
  175.           enqueue(&peer_list, peer);
  176.       }
  177.   
  178. ***************
  179. *** 351,367 ****
  180.       }
  181.   #endif
  182.   
  183.   #ifdef    DEBUG
  184. !     if (peer_mode < MODE_SYM_ACT || peer_mode > MODE_BROADCAST ||
  185. !         peer->hmode < MODE_SYM_ACT || peer->hmode > MODE_BROADCAST) {
  186. !         printf("Bogus peer_mode or peer->hmode\n");
  187.           abort();
  188.       }
  189. - #endif
  190.   
  191.       switch (actions[peer_mode - 1][peer->hmode - 1]) {
  192.       case ACT_RECV:
  193. !         if (!(peer->flags & PEER_FL_CONFIG == 0 &&
  194.                 STRMCMP(pkt->stratum, >, sys.stratum))) {
  195.               peer->reach |= 1;
  196.               process_packet(dst, pkt, tvp, peer);
  197. --- 370,393 ----
  198.       }
  199.   #endif
  200.   
  201. +     if (peer_mode < MODE_SYM_ACT || peer_mode > MODE_BROADCAST) {
  202. +         syslog(LOG_DEBUG, "Bogus peer_mode %d from %s", peer_mode,
  203. +                ntoa(dst->sin_addr));
  204.   #ifdef    DEBUG
  205. !         if (debug > 3) abort();
  206. ! #endif
  207. !         return;
  208. !     }
  209. ! 
  210. !     if (peer->hmode < MODE_SYM_ACT || peer->hmode > MODE_BROADCAST) {
  211. !         syslog(LOG_ERR, "Bogus hmode %d for peer %s", peer->hmode,
  212. !                ntoa(peer->src.sin_addr));
  213.           abort();
  214.       }
  215.   
  216.       switch (actions[peer_mode - 1][peer->hmode - 1]) {
  217.       case ACT_RECV:
  218. !         if (!(((peer->flags & PEER_FL_CONFIG) == 0) &&
  219.                 STRMCMP(pkt->stratum, >, sys.stratum))) {
  220.               peer->reach |= 1;
  221.               process_packet(dst, pkt, tvp, peer);
  222. ***************
  223. *** 369,386 ****
  224.           }
  225.           /* Note fall-through */
  226.       case ACT_ERROR:
  227. !         if ((peer != &dummy_peer) && (peer->flags & PEER_FL_CONFIG))
  228. !             demobilize(peer);
  229. !         return;
  230.   
  231.       case ACT_PKT:
  232. !         if (!((peer->flags & PEER_FL_CONFIG == 0) &&
  233. !             STRMCMP(pkt->stratum, >, sys.stratum))) {
  234.               peer->reach |= 1;
  235.               process_packet(dst, pkt, tvp, peer);
  236.               break;
  237.           }
  238. !         /* note fall-through */
  239.       case ACT_XMIT:
  240.           process_packet(dst, pkt, tvp, peer);
  241.           poll_update(peer, peer->ppoll);
  242. --- 395,413 ----
  243.           }
  244.           /* Note fall-through */
  245.       case ACT_ERROR:
  246. !         if (((peer->flags & PEER_FL_CONFIG) == 0) &&
  247. !             (peer != &dummy_peer))
  248. !             demobilize(&peer_list, peer);
  249. !         break;
  250.   
  251.       case ACT_PKT:
  252. !         if (!(((peer->flags & PEER_FL_CONFIG) == 0) &&
  253. !               STRMCMP(pkt->stratum, >, sys.stratum))) {
  254.               peer->reach |= 1;
  255.               process_packet(dst, pkt, tvp, peer);
  256.               break;
  257.           }
  258. !         /* Note fall-through */
  259.       case ACT_XMIT:
  260.           process_packet(dst, pkt, tvp, peer);
  261.           poll_update(peer, peer->ppoll);
  262. ***************
  263. *** 989,995 ****
  264.                  inet_ntoa(peer->src.sin_addr), peer->stratum);
  265.   #endif
  266.       /* Sanity check 0. ?? */
  267. !     if (!(peer->flags & PEER_FL_CONFIG))
  268.           return(0);
  269.   
  270.       /* Sanity check 1. */
  271. --- 1016,1022 ----
  272.                  inet_ntoa(peer->src.sin_addr), peer->stratum);
  273.   #endif
  274.       /* Sanity check 0. ?? */
  275. !     if (!(peer->flags & PEER_FL_SYNC))
  276.           return(0);
  277.   
  278.       /* Sanity check 1. */
  279. ***************
  280. *** 1020,1026 ****
  281.           The peer clock must be synchronized... and the interval since
  282.           the peer clock was last updated satisfy
  283.   
  284. !         peer.org - peer.reftime < NTP.MAXAGS
  285.        */
  286.       if (peer->leap == ALARM ||
  287.           (ul_fixed_to_double(&peer->org)
  288. --- 1047,1053 ----
  289.           The peer clock must be synchronized... and the interval since
  290.           the peer clock was last updated satisfy
  291.   
  292. !         peer.org - peer.reftime < NTP.MAXAGE
  293.        */
  294.       if (peer->leap == ALARM ||
  295.           (ul_fixed_to_double(&peer->org)
  296.  
  297. Index: ntpd.c
  298. *** ntpd.c.old    Fri Mar 31 16:39:44 1989
  299. --- ntpd.c    Fri Mar 31 16:39:46 1989
  300. ***************
  301. *** 1,9 ****
  302.   #ifndef    lint
  303. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntpd.c,v $ $Revision: 3.4.1.4 $ $Date: 89/03/29 12:30:46 $";
  304.   #endif    lint
  305.   
  306.   /*
  307.    *  $Log:    ntpd.c,v $
  308.    * Revision 3.4.1.4  89/03/29  12:30:46  louie
  309.    * peer->mode has been renamed peer->hmode.  Drop PEER_FL_SYNC since the
  310.    * PEER_FL_CONFIG flag means much the same thing.
  311. --- 1,13 ----
  312.   #ifndef    lint
  313. ! static char *rcsid = "$Source: /usr/users/louie/ntp/RCS/ntpd.c,v $ $Revision: 3.4.1.5 $ $Date: 89/03/31 16:37:49 $";
  314.   #endif    lint
  315.   
  316.   /*
  317.    *  $Log:    ntpd.c,v $
  318. +  * Revision 3.4.1.5  89/03/31  16:37:49  louie
  319. +  * Add support for "trusting" directive in NTP configuration file.  It allows 
  320. +  * you to specify at run time if non-configured peers will be synced to.
  321. +  * 
  322.    * Revision 3.4.1.4  89/03/29  12:30:46  louie
  323.    * peer->mode has been renamed peer->hmode.  Drop PEER_FL_SYNC since the
  324.    * PEER_FL_CONFIG flag means much the same thing.
  325. ***************
  326. *** 114,119 ****
  327. --- 118,124 ----
  328.   int doset = 1;
  329.   int ticked;
  330.   int selfds;
  331. + int trusting = 1;
  332.   
  333.   double WayTooBig = WAYTOOBIG;
  334.   unsigned long clock_watchdog;
  335. ***************
  336. *** 242,253 ****
  337.           setlogmask(LOG_UPTO(LOG_INFO));
  338.   #endif    /* LOG_DAEMON */
  339.   
  340. !     syslog(LOG_NOTICE, "%s version $Revision: 3.4.1.4 $", prog_name);
  341.       syslog(LOG_NOTICE, "patchlevel %d", PATCHLEVEL);
  342.   
  343.   #ifdef    DEBUG
  344.       if (debug)
  345. !         printf("%s version $Revision: 3.4.1.4 $ patchlevel %d\n",
  346.                  prog_name, PATCHLEVEL);
  347.   #endif
  348.       (void) setpriority(PRIO_PROCESS, 0, -10);
  349. --- 247,258 ----
  350.           setlogmask(LOG_UPTO(LOG_INFO));
  351.   #endif    /* LOG_DAEMON */
  352.   
  353. !     syslog(LOG_NOTICE, "%s version $Revision: 3.4.1.5 $", prog_name);
  354.       syslog(LOG_NOTICE, "patchlevel %d", PATCHLEVEL);
  355.   
  356.   #ifdef    DEBUG
  357.       if (debug)
  358. !         printf("%s version $Revision: 3.4.1.5 $ patchlevel %d\n",
  359.                  prog_name, PATCHLEVEL);
  360.   #endif
  361.       (void) setpriority(PRIO_PROCESS, 0, -10);
  362. ***************
  363. *** 692,697 ****
  364. --- 697,713 ----
  365.           if (strcmp(name, "maxpeers") == 0) {
  366.               if (fscanf(fp, "%d", &sys.maxpeers) != 1)
  367.                   error = TRUE;
  368. +         } else if (strcmp(name, "trusting") == 0) {
  369. +             if (fscanf(fp, "%s", name) != 1)
  370. +                 error = TRUE;
  371. +             else {
  372. +                 if (*name == 'Y' || *name == 'y') {
  373. +                     trusting = 1;
  374. +                 } else if (*name == 'N' || *name == 'n') {
  375. +                     trusting = 0;
  376. +                 } else
  377. +                     trusting = atoi(name);
  378. +             }
  379.           } else if (strcmp(name, "debuglevel") == 0) {
  380.               if (fscanf(fp, "%d", &debuglevel) != 1)
  381.                   error = TRUE;
  382. ***************
  383. *** 798,811 ****
  384. --- 814,830 ----
  385.                               peer->hmode = MODE_SYM_ACT;
  386.                               peer->stopwatch = stagger;
  387.                               stagger += (1<<CLOCK_ADJ);
  388. +                             peer->flags |= PEER_FL_SYNC;
  389.                               break;
  390.                           case MODE_CLIENT:    /* "server" */
  391.                               peer->hmode = MODE_CLIENT;
  392.                               peer->stopwatch = stagger;
  393.                               stagger += (1<<CLOCK_ADJ);
  394. +                             peer->flags |= PEER_FL_SYNC;
  395.                               break;
  396.                           case MODE_SYM_PAS:    /* "passive" */
  397.                               peer->hmode = MODE_SYM_PAS;
  398. +                             peer->flags |= PEER_FL_SYNC;
  399.                               break;
  400.                           default:
  401.                               printf("can't happen\n");
  402.  
  403. Index: stat.pl
  404. Prereq: 3.4.1.3
  405. *** stat.pl.old    Fri Mar 31 16:39:51 1989
  406. --- stat.pl    Fri Mar 31 16:39:52 1989
  407. ***************
  408. *** 1,5 ****
  409.   #!/usr/bin/perl  
  410. ! # $Source: /usr/users/louie/ntp/RCS/stat.pl,v $ $Revision: 3.4.1.3 $ $Date: 89/03/29 12:47:32 $
  411.   #
  412.   #  Make plots from ntpd syslog messages.  Invoked as:
  413.   #
  414. --- 1,5 ----
  415.   #!/usr/bin/perl  
  416. ! # $Source: /usr/users/louie/ntp/RCS/stat.pl,v $ $Revision: 3.4.1.4 $ $Date: 89/03/31 16:38:42 $
  417.   #
  418.   #  Make plots from ntpd syslog messages.  Invoked as:
  419.   #
  420. ***************
  421. *** 94,100 ****
  422.               $clk{$in[8]} = $clocks++;
  423.           }
  424.           $t = $t - $start;
  425. !         print CLK $t,$clk{$in[8]},"\n";
  426.   
  427.       }
  428.       if (/.* ntpd\[[0-9]*\]: adjust:/) {
  429. --- 94,100 ----
  430.               $clk{$in[8]} = $clocks++;
  431.           }
  432.           $t = $t - $start;
  433. !         print CLK $t," ",$clk{$in[8]},"\n";
  434.   
  435.       }
  436.       if (/.* ntpd\[[0-9]*\]: adjust:/) {
  437. ***************
  438. *** 123,128 ****
  439. --- 123,131 ----
  440.           #
  441.           #  Scale compliance by T (2**18)
  442.           #
  443. +         if ( $in[15] < 0 ) {
  444. +             $in[15] = -$in[15];
  445. +         }
  446.           print COMP $t," ",$in[15] * 2**18, "\n";
  447.       }
  448.   }
  449. ***************
  450. *** 132,138 ****
  451.   } else {
  452.       $last = int($t);
  453.   }
  454. ! print "$recs records spanning %t hours.\n";
  455.   
  456.   close OFF;
  457.   close DRIFT;
  458. --- 135,141 ----
  459.   } else {
  460.       $last = int($t);
  461.   }
  462. ! print "$recs records spanning $t hours.\n";
  463.   
  464.   close OFF;
  465.   close DRIFT;
  466. ***************
  467. *** 206,213 ****
  468.       unlink "stats.clk";
  469.   }
  470.   
  471. - ;# $Header: /usr/users/louie/ntp/RCS/stat.pl,v 3.4.1.3 89/03/29 12:47:32 louie Exp $
  472. - 
  473.   ;# Process single-character switches with switch clustering.  Pass one argument
  474.   ;# which is a string containing all switches that take an argument.  For each
  475.   ;# switch found, sets $opt_x (where x is the switch name) to the value of the
  476. --- 209,214 ----
  477.  
  478. Index: test.c
  479. *** test.c.old    Fri Mar 31 16:39:55 1989
  480. --- test.c    Fri Mar 31 16:39:55 1989
  481. ***************
  482. *** 1,9 ****
  483.   #ifndef    lint
  484. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/test.c,v $ $Revision: 3.4.1.1 $ $Date: 89/03/22 18:32:26 $";
  485.   #endif
  486.   
  487.   /*
  488.    * $Log:    test.c,v $
  489.    * Revision 3.4.1.1  89/03/22  18:32:26  louie
  490.    * patch3: Use new RCS headers.
  491.    * 
  492. --- 1,12 ----
  493.   #ifndef    lint
  494. ! static char *RCSid = "$Source: /usr/users/louie/ntp/RCS/test.c,v $ $Revision: 3.4.1.2 $ $Date: 89/03/31 16:39:19 $";
  495.   #endif
  496.   
  497.   /*
  498.    * $Log:    test.c,v $
  499. +  * Revision 3.4.1.2  89/03/31  16:39:19  louie
  500. +  * Bug fix for VAX_COMPILER_FLT_BUG test, start of test for Sun problem.
  501. +  * 
  502.    * Revision 3.4.1.1  89/03/22  18:32:26  louie
  503.    * patch3: Use new RCS headers.
  504.    * 
  505. ***************
  506. *** 70,78 ****
  507. --- 73,85 ----
  508.               exit(2);
  509.           if (test3(1))
  510.               exit(3);
  511. +         if (test4(1))
  512. +             exit(4);
  513.       } else {
  514.           if (test3(0))
  515.               exit(3);
  516. +         if (test4(0))
  517. +             exit(4);
  518.       }
  519.       exit(0);
  520.   }
  521. ***************
  522. *** 124,134 ****
  523.   
  524.       dbl = ul;
  525.   #ifdef    VAX_COMPILER_FLT_BUG
  526. !     if (dbl < 0.0) a += 4.294967296e9;
  527.   #endif
  528.       if (dbl != 2147483648.0) {
  529. !         printf("test3 fails %lu != %f - can't convert from unsigned long to float\n",
  530. !                ul, dbl);
  531.           return 1;
  532.       } else {
  533.           if (v)
  534. --- 131,142 ----
  535.   
  536.       dbl = ul;
  537.   #ifdef    VAX_COMPILER_FLT_BUG
  538. !     if (dbl < 0.0) dbl += 4.294967296e9;
  539.   #endif
  540.       if (dbl != 2147483648.0) {
  541. !         printf("test3 fails: can't convert from unsigned long to float\n");
  542. !         printf("             (%lu != %f)\n", ul, dbl);
  543. !         printf("Try defining VAX_COMPILER_FLT_BUG in the Makefile.\n");
  544.           return 1;
  545.       } else {
  546.           if (v)
  547. ***************
  548. *** 137,140 ****
  549. --- 145,163 ----
  550.       }
  551.   }
  552.   
  553. + test4(v)
  554. +     int v;
  555. + {
  556. +     /* 
  557. +      * Need a test for the SUN 2^31 - 2^32 problem (in ntpsubs.c).  Anyone
  558. +      * with a Sun out there that can come up with one?
  559. +      *
  560. +      */
  561. +     if (0) {
  562. +         printf("test4 fails:\n");
  563. +         printf("Try defining SUN_FLT_BUG in the Makefile\n");
  564. +         return 1;
  565. +     }
  566. +     return 0;
  567. + }
  568.   
  569.